home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1995 February: Tool Chest / Dev.CD Feb 95 / Dev.CD Feb 95.toast / Sample Code / MacCalendar 1.0d5 / Src / MacCalendar.r < prev    next >
Encoding:
Text File  |  1994-06-30  |  2.3 KB  |  108 lines  |  [TEXT/KAHL]
  1. /*                                    MacCalendar.r                                    */
  2. /*
  3.  * MacCalendar.r
  4.  * Copyright © 1994 Martin Minow. All rights reserved.
  5.  */
  6. #define REZ
  7. #ifndef  SystemSevenOrLater
  8. #define  SystemSevenOrLater 1
  9. #endif
  10. #include "Pict.r"
  11. #include "Types.r"
  12. #include "SysTypes.r"
  13. #include "BalloonTypes.r"
  14. #include "MacCalendar.h"
  15. #if MPW
  16. include "::MacCalendarIcons.rsrc";
  17. #endif
  18.  
  19. /*
  20.  * Boilerplate
  21.  */
  22. resource 'vers' (1) {
  23.     kVersionMajor, kVersionMinor, kVersionStage, kVersionRelease, verUS,
  24.     kVersionIdent,
  25.     kVersionString
  26. };
  27.  
  28. type kApplicationCreator as 'STR ';
  29.  
  30. resource kApplicationCreator (0) {
  31.     "MacCalendar: " kVersionString
  32. };
  33. resource 'BNDL' (BNDL_Calendar) {
  34.     kApplicationCreator, 0,
  35.     {
  36.         'FREF', {0, FREF_Calendar};
  37.         'ICN#', {0, ICON_Calendar};
  38.     }
  39. };
  40.  
  41. resource 'FREF' (FREF_Calendar) {
  42.     'sdev', 0, ""
  43. };
  44.  
  45. resource 'STR#' (STRN_Info) {
  46.     {
  47.         kCalendarPrefName,                    /* Shared with MacCalendarSetup    */
  48.         "MacCalendar\n\n"
  49.             "This Control Strip module displays the current month’s calendar",
  50.         "Geneva",                            /* Font name                    */
  51.         "9",                                /* Font size                    */
  52.         "1",                                /* 1 == Sunday, 2 == Monday        */
  53.         "\001S\001M\002Tu\001W\002Th\001F\001S\000",    /* Day name string    */
  54.     }
  55. };
  56.  
  57. /*
  58.  * Arrow picture to signal a popup menu (actually, we don't have one). This must
  59.  * be a polygon so the background color shows around the arrow itself.
  60.  */
  61. resource 'PICT' (PICT_RightArrow) {
  62.     {0, 0, 8, 6}, VersionOne {
  63.         {
  64.             ClipRgn        {{0, 0, 8, 6}, $""};
  65.             FillPoly    {{0, 0, 8, 6}, {{0, 2}, {4, 6}, {8, 2}, {0, 2}}};
  66.         }
  67.     }
  68. };
  69.  
  70. resource 'hfdr' (kHMHelpID) {
  71.     HelpMgrVersion, hmDefaultOptions, 0, 0,
  72.     {
  73.         HMStringItem    {
  74.             "MacCalendar\n\n"
  75.              "This Control Strip module draws this month’s calendar.  To use this"
  76.              " file, place it into the Control Strip folder in the System Folder"
  77.              " and restart the computer."
  78.         };
  79.     }
  80. };
  81.  
  82.  
  83. #ifdef __powerc
  84. /*
  85.  * All Power PC applications need a code-fragment resource that the code fragment
  86.  * manager uses to facilitate dynamic fragment binding. Note that the PowerPC stuff
  87.  * hasn't been tested. Note also that the current version of the Control Strip
  88.  * headers are 68000 specific.
  89.  */
  90. #include "CodeFragmentTypes.r"
  91.     
  92. resource 'cfrg' (0) {
  93.     {
  94.         kPowerPC,
  95.         kFullLib,
  96.         kNoVersionNum,
  97.         kNoVersionNum,
  98.         kDefaultStackSize,
  99.         kNoAppSubFolder,
  100.         kIsApp,
  101.         kOnDiskFlat,
  102.         kZeroOffset,
  103.         kWholeFork,
  104.         "MacCalendar"
  105.     }
  106. };
  107. #endif
  108.